Top 10k strings from Video Spectrum - Issue 08 (1985)(Video Spectrum)(es)(Side B).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
4 MOVIMIENTO 4 ;"VIDEOSPECTRUM" 4 ;"Revista de Software" 3 q(b,a1,b1): 3 ;"______________________________" 3 ;"SUSCRIBASE TELEFONICAMENTE": 3 ;"PULSA UNA TECLA": 3 ;"CONCURSO": 3 ;"C/ San Telmo 24 - 28016 MADRID" 3 ;"1)Realice un programa original" 2 x,y;" " 2 q(a,c1,a1) 2 q(a,b1,a1): 2 p(c,b1,b): 2 c(c,b1,b)>1 2 R$(x,y)=" " 2 ;"________ INSTRUCCIONES _________" 2 ;"Tfno.(91) 259 31 08" 2 ;"BARCOS:"; 2 ;"3)Si es elegido ganara 5000 Pts" 2 ;"2)Mandenoslo en un cassette" 2 ;"***********" 2 ********************** 2 "INTRODUZCA LA VELOCIDAD MEDIA",V 2 "INTRODUZCA LA VELOCIDAD MEDIA DEL MOVIL",V 2 "INTRODUZCA LA ACELERACION MEDIA",A 2 "INTRODUZCA EL TIEMPO QUE HA ESTADO EL MOVIL EN MOVIMIENTO",T 2 "CUAL ES SU PROBLEMA?",X 2 "CUAL ES LA MASA?",M 2 "CUAL ES EL ANGULO DEL PLANO?",a 2 " INCOGNITAS"''" Angulo A=";a2;" grados"'" C=";c2'" Lado a=";a''" Los datos eran:"''" lado b=";b'" c=";c'" Angulo B=";b2 2 2 1 y=y-(t$="5")+(t$="8"): 1 x=x+(t$="6")-(t$="7"): 1 x,y;R$(x,y): 1 t(t)=t(t)+1 1 let let let let let 1 dj=(i$="m")-(i$="n"): 1 dj=(i$="M")-(i$="N"): 1 caso 4 se conocen a,B,C 1 caso 3 se conocen dos lados y el angulo opuesto a uno de ellos 1 caso 2 se conocen un lado un angulo adyacente y el opuesto 1 caso 1 se conocen dos lados y el angulo comprendido 1 WI=WI+0.03 1 TZX por Manuel Gomez Amate 1 TRIANGULOS 1 Se conocen los tres lados 1 SUBRUTINAS 1 SPRING c 1 SAVE "CONVOY" LINE 5 1 RESOLOCION DE TRIANGULOS 1 PANTALLA 1 O MUERTO O PANTALLA 1 MUERTO 1 JAVILERO 3 1 GOLIAT w 1 FISICA 1 E=e+v*t+(A*T^2 1 Castellano 1 CR841002 ] 1 CONVOY )! 1 COMIENZO DEL JUEGO 1 CINTA 08 Cara B 1 CARA 1 C,D;R$(C,D): 1 ;"velocidad=350" 1 ;"pulsa cualquier tecla": 1 ;"grados=45" 1 ;"angulo ";s 1 ;"_____________________________" 1 ;"VERTICALES": 1 ;"UN PROGRAMA ORIGINAL DE"; 1 ;"Tfno. (91) 259 31 08" 1 ;"TRES TRIANGULOS"; 1 ;"TRATA DE DISPARAR MEJOR"; 1 ;"TIENES QUE CONSEGUIR SALIR CON 10 BONUS (#) ,SI NO MUERES": 1 ;"TIEMPO:" 1 ;"TIEMPO "; 1 ;"TENEMOS QUE INTRODUCIR LOS GRADOS Y VELOCIDAD DEL DISPARO" 1 ;"SI CHOCAS CON LOS CACTUS (*), PIERDES BONUS Y PUNTOS ,Y SI CO-JES DOLARES ($) SUMAS PUNTOS" 1 ;"SALVANDO CRUCIGRAMA": 1 ;"SALVADOS"; 1 ;"QUIERES INSTRUCCIONES (s/n)" 1 ;"Pulse una tecla": 1 ;"Pulse una tecla para jugar": 1 ;"Pulsa una tecla para ver la otra": 1 ;"PUNTOS 0" 1 ;"PUNTOS ";P; 1 ;"PUNTOS ";P 1 ;"PULSE UNA TECLA": 1 ;"PULSE UNA TECLA PARA CONTINUAR" 1 ;"PULSA UNA TECLA PARA CONTINUAR" 1 ;"POR JUAN CARLOS RUFO" 1 ;"PARE LA CINTA": 1 ;"PARE LA CINTA" 1 ;"Observa que a es el lado"'" opuesto al angulo A"'" b el opuesto al B"'"y c el opuesto al C"''" PULSA UNA TECLA": 1 ;"OTRA PARTIDA ? (s/n)" 1 ;"OTRA PANTALLA" 1 ;"NO CERRARIA": 1 ;"NAVEGANDO"; 1 ;"MANEJAS UNA NAVE POR TODO EL RE-CINTO CON LAS TECLAS: 1 ;"LO SIENTO"; 1 ;"LA VELOCIDAD MEDIA ES ";V 1 ;"LA VELOCIDAD FINAL ES ";V 1 ;"LA VELOCIDAD ES ";V 1 ;"LA PARTIDA HA TERMINADO" 1 ;"LA FUERZA ES ";A+B+C 1 ;"LA FUERZA DE ATRACCION ES: ";G*A/B 1 ;"LA ACELERACION MEDIA ES ";A 1 ;"LA ACELERACION ES: ";G*(B-C) 1 ;"J.M.GONZALEZ" 1 ;"INSTRUCCIONES...SYMBOL SHIFT+I" 1 ;"INSTRUCCIONES" 1 ;"HUNDIDOS" 1 ;"HORIZONTALES": 1 ;"F.J.GONZALEZ"; 1 ;"EMPEZAMOS ?" 1 ;"EL TIEMPO ES ";T 1 ;"EL TIEMPO EMPLEADO ES ";T 1 ;"EL ORDENADOR LE OFRECERA OPCIO NES Y LE PEDIRA DATOS."''';"DEBE TENER EN CUENTA EL SISTEMA DE UNIDADES EN EL QUE INTRODUCE LOS DATOS"''';"PERMANEZCA ATENTO A LA PANTALLA MIENTRAS SE LE PREGUNTA SU PRO- BLEMA"''';"PULSE UNA TECLA PARA CONTINUAR": 1 ;"EL ESPACIO RECORRIDO ES ";E 1 ;"EL ESPACIO RECORRIDO ES ";E 1 ;"EL CUERPO NO BAJARA" 1 ;"DESTRUIRLE"; 1 ;"DEL DIBUJO" 1 ;"CUANDO SALES PASAS A UNA PANTALLA MAS DIFICIL, Y ASI HASTA 6": 1 ;"CON AYUDA DE"; 1 ;"CARGANDO SOLUCION": 1 ;"CARGANDO CRUCIGRAMA": 1 ;"BRAVO ! ALLA VAS DE NUEVO" 1 ;"BONUS ";T 1 ;"BARCOS:" 1 ;"ASI PASA CON LOS"; 1 ;"ACONSEJAMOS:" 1 ;"5:ESPACIO RECORRIDO POR UN MOVIL ACELERADO" 1 ;"4:VELOCIDAD FINAL EN CAIDA LIBRE"''; 1 ;"4)Envielo a:VIDEOSPECTRUM" 1 ;"4)Envielo a: VIDEOSPECTRUM" 1 ;"4)Envielo a : VIDEOSPECTRUM 1 ;"3:TIEMPO INVERTIDO EN ALCANZAR UNA VELOCIDAD DADA CON UNA ACELERACION MEDIA CONOCIDA"''; 1 ;"3)Si es elegido ganara 5000 pts" 1 ;"2:VELOCIDAD MEDIA DE UN MOVIMIENTO ACELERADO"''; 1 ;"2)Mandenoslo en una cassette" 1 ;"**********" 1 ;"!!FELICITACIONES!!"; 1 ;"!!!ADIOS!!!!": 1 ;"!! MUY MAL !!!"; 1 ;" TRATAMOS DE HACER LO MISMO QUE HICIERON CON GOLIAT" 1 ;" PULSA UNA TECLA": 1 ;" LO HA HECHO USTED BIEN, PERO..." 1 ;" CUANDO UNA TARANTULA DESCIENDE HASTA EL SUELO , JAVILERO ESTA INEXORABLEMENTE CONDENADO A MORIR " 1 ;" BASTANTE MAL, TIENE QUE MEJORAR" 1 ;" y otras por el estilo"''"PULSA UNA TECLA": 1 ;" JAVILERO ESTA ACOSADO POR LAS TARANTULAS ,QUE DESCIENDEN CADA VEZ MAS DEPRISA . SE DESPLAZA a IZ <N> , DCH<M> ; SI ADEMAS SE PULSA CAPS SHIFT INCREMENTA LA VELOCIDAD LANZANDO UNA BOCANADA DE FUEGO <Z>,OBLIGA A RETROCEDER A LAS TARANTULAS,EN EL CASO DE QUE NO TUBIERAN SUFICIENTE ESPACIO SE DESINTEGRARIAN EN AMBOS CASOS CONSIGUE 2 PTOS" 1 ;" " 1 300 ptas (1'80 eur) 1 1:Persona a quien seacusa.2:Tocan repetidamente con las ma- nos.3:Elemento de compuestos de la vozAl reves,osmio.4:Oficial del ejercito turco.Al reves,refe-rente a un dia.5:De-rribais.6:Al reves,cortar super-ficialmente con los dientes.Con-sonante.Azufre.7:Metaloide que- bradizo de color gris.8:Interje-ccion para hacer parar las caba-llerias.Pronombre personal.Qui- nientos.9:Parte lateral de la cabeza.Sodio. 1 1:Americio.Interje- ccion para mandar retroceder a alguno.2:Que llevan carga.3: Juntabamos.Yodo.4:Sonido agradable.Cortode extension.5:Pone por el suelo.Impar. 6:Preposicion.Al re-ves,siriaca.7:Paraje con vegeta-cion en medio de un desierto. Cien.Nitrogeno.8:Al reves,bien natural.Bebida de agua y acido carbonico. 1 /D.L.: M. 12095-1985 1 *** FISICA *** 1 ((t(t)+l(t))/2 1 '''" TIENE A SU CARGO UNA FLOTA DE DOCE NAVIOS Y LOS DEBE HACER CRUZAR POR DELANTE DE UNA POTENTISIMA BATERIA ENEMIGA."''" TIENE UN TIEMPO LIMITE PARA PO-DER REALIZAR ESTA MANIOBRA."''" SUS MOVIMIENTOS LOS HACE CON:"''" M.- AVANZAR"''" Z.- RETROCEDER" 1 '''" TENIA NAVEGANDO BARCOS: ";nav: 1 ''"Los lados y angulos deben ser positivos y la suma de los"'"angulos que introduces menor"'" que 180": 1 ''" SE HAN SALVADO BARCOS: ";sal: 1 ''" Los DATOS eran:"''" Lado a=";a'" Angulo B=";b2;" grados"'" C=";c2 1 ''" LE HAN HUNDIDO BARCOS: ";hun: 1 ''" HA EMPLEADO UN TIEMPO: ";t: 1 ''" LOS DATOS ERAN:"''" a=";a'" b=";b'" c=";c: 1 '" ES USTED UN ALMIRANTE MUY BUENO" 1 '" MEJOR DEDIQUESE A OTRA COSA" 1 ###### FUEGO ########## 1 ##### DESCENSO DE ################### TARANTULAS ##### 1 ##### ATAQUE FINAL ################## TARANTULA ### 1 #### BAJAR TARANTULA ## 1 #### ANDAR J ########## 1 "velocidad= ";d 1 "velocidad ";d 1 "quieres intentarlo otra vez (s/n)";z$ 1 "angulo= ";s 1 "____"'" a"'"___________"'" b"'"___"'" c" 1 "VOLVER AL PROGRAMA.. "; 1 "VERTICALES........SYMBOL SHIFT+V" 1 "SO841002": 1 "SALVAR CRUCIGRAMA..........1" 1 "QUIERE INSTRUCCIONES? (S/N)",I$ 1 "PULSA el numero de la opcion"'" que desees y luego ENTER": 1 "PULSA UNA TECLA": 1 "No existe triangulo, un lado es"'"mayor o igual que la suma de los"'"otros dos": 1 "MOV.DEL CURSOR: 5...IZQUIERDA 6...ABAJO 7...ARRIBA 8...DERECHA" 1 "Los lados deben ser positivos": 1 "LA LETRA W CORRESPONDE A LA w " 1 "Introduce primero el lado, des"'"pues el angulo opuesto y por"'"ultimo el adyacente"'"pulsando ENTER tras cada dato": 1 "INTRODUZCALA ACELERACION MEDIA",A 1 "INTRODUZCA VELOCIDAD INICIAL",v 1 "INTRODUZCA LA VELOCIDAD INICIAL",v 1 "INTRODUZCA LA MASA MENOR",m 1 "INTRODUZCA LA MASA MAYOR",M 1 "INTRODUZCA LA DISTANCIA ENTRE LOS CENTROS DE AMBOS CUERPOS",D 1 "INTRODUZCA ESPACIO INICIAL",e 1 "INTRODUZCA EL TIEMPO QUE HA DURADO EL MOVIMIENTO",T 1 "INTRODUZCA EL TIEMPO QUE DURA LA ACELERACION",T 1 "INTRODUZCA EL TIEMPO EMPLEADO",T 1 "INTRODUZCA EL TIEMPO DURANTE EL QUE MANTIENE LA VELOCIDAD INI CIAL",t 1 "INTRODUZCA EL ESPACIO RECORRIDO",E 1 "INTRODUZCA EL ESPACIO RECORRIDO POR EL MOVIL",E 1 "INTRODUZCA EL ESPACIO QUE HA RE CORRIDO EL MOVIL EN CAIDA LIBRE",E 1 "INTRODUCE los valores de los "'"lados pulsando ENTER tras cada uno": 1 "HORIZONTALES......SYMBOL SHIFT+H" 1 "ESTA OPCION LE DICE LA FUERZA DE ATRACCION QUE EXISTE ENTRE DOS CUERPOS"''';"PULSE UNA TECLA": 1 "ELIJA ENTRE EL MENU",X 1 "CUALES EL COEFICIENTE DE ROZA MIENTO?",R 1 "CUAL ES SU PROBLEMA?",Y 1 "CUAL ES LA INCOGNITA?",A$ 1 "CUAL ES EL COEFICIENTE DE ROZA MIENTO?",R 1 "CARGAR PROGRAMA SOLUCION...2" 1 "CARGAR CRUCIGRAMA..........3" 1 "BORRAR UNA LETRA...0" 1 "A QUE ACELERACION DESEA QUE AS CIENDA LA MASA?",A 1 "1:VELOCIDAD (V)"'''';"2:ESPACIO (E)"'''';"3:TIEMPO (T)" 1 "1:PLANOS INCLINADOS"''''';"2:FUERZA GRAVITATORIA"'' 1 "1:MOVIMIENTO UNIFORME"'''';"2:MOVIMIENTO UNIFORMEMENTE"'';"ACELERADO"'''';"3:DINAMICA" 1 "1:LA INCOGNITA ES LA FUERZA QUE HAY QUE APLICAR A UNA MASA PARA QUE ASCIENDA CON UNA ACE LERACION DADA"''"2:DESEAMOS SABER CON QUE ACELE RACION BAJARA UNA MASA SOBRE LA QUE NO EJERCEMOS FUERZA AL GUNA" 1 "1:ACELERACION MEDIA DE UN MOVIL"''; 1 " no existe triangulo, a mayor "'"angulo se debe oponer mayor lado": 1 " Solo hay una solucion" 1 " Sin embargo en los siguientes"'"casos:"''" 1-Dados un lado y dos angulos"''" 2-Dados dos lados y un angulo"''" 3-Dados los tres lados"''"El teorema del COSENO y el "'" teorema de los SENOS"'" nos permiten encontrar todos"'"los triangulos que tengan los"'" elementos dados "''"o decidir la imposibilidad de "'"que exista un triangulo "'"con dichos elementos" 1 " Si solo conocemos los tres"'" angulos de un triangulo"''" (aunque su suma sea 180)"'"nos es imposible saber los lados"''" pues diversos triangulos"'"( con los angulos conocidos )"'" pueden tener distintos lados" 1 " PULSA UNA TECLA Y VERAS LA FOR MA DEL TRIANGULO": 1 " No existe triangulo a mayor"'" lado mayor angulo y la suma"'"seria mayor de 180": 1 " Los lados y angulos deben ser"'"positivos y la suma de los "'"angulos menor que 180": 1 " Los lados deben ser positivos"'"y el angulo menor de 180 grados": 1 " Llamando A,B,C a los angulos"'"y a,b,c a los lados opuestos"'"los casos de resolucion de"'"triangulos son los siguientes:"''" DATOS INCOGNITAS"''" 1 a,b,C A,B,c"''" 2 a,A,C b,c,B" 1 " La Primera": 1 " Introduce primero los dos lados y despues el angulo en grados"'"pulsa ENTER tras cada dato": 1 " Introduce primero el lado y despues los angulos en grados"'"sexagesimales, pulsando ENTER"'" tras cada dato": 1 " Hay dos soluciones": 1 " En este caso si el angulo es"'"menor de 90 grados y el lado "'"opuesto a el es menor que el "'"otro lado conocido "'"hay dos soluciones"''"(suponiendo los datos compati"'"bles) o de otra forma: si hay"'"solucion hay dos"'''" Introduce primero el angulo"'"a continuacion el lado opuesto"'"y por ultimo el otro conocido": 1 " EL TEOREMA DEL COSENO es:"'''" 2 2 2"'" a =b +c -2*b*c*cosA"'''''" y el de los SENOS"'''" a b c"'" ---- = ---- = ----"'" senA senB senC"'''''" PULSA UNA TECLA": 1 " Cada triangulo consta de tres"'"angulos A,B,C "'"y tres lados a,b,c" 1 " 3 b,c,B A,C,a"''" 4 a,B,C A,b,c"''" 5 a,b,c A,B,C" 1 " Tampoco podemos construir un"'" triangulo con los lados que"'" nos de la gana"''" Por ejemplo si a,b,c son:" 1 " QUIERE JUGAR OTRA? (s/n)";p$ 1 " La suma de los tres angulos"'" de un triangulo es 180 grados"'" Observa como se agrupan los"'" tres angulos en el vertice C,"'" y lo mismo se podria hacer"'" con cualquier triangulo" 1 " RESOLUCION DE TRIANGULOS"'''" NOCIONES PREVIAS"''" Los triangulos son objetos ma tematicos cuya representacion"'"grafica da lugar a figuras del"'"tipo de estas" 1 " POR LO TANTO:"''" un triangulo no puede tener los"'" angulos que nos de la gana"''" Por ejemplo no puede ser:"''" A=60 ; B=70 ; C=100"''" pues en este caso A+B+C=230"'" que es mayor que 180"'''''" PULSA UNA TECLA": 1 " INCOGNITAS"''" ANGULOS GRADOS"'" A= ";a2'" B= ";b2'" C= ";c2 1 " INCOGNITAS"''" Angulo B=";b2;" grados"'" Lado b=";b'" c=";c''" Los Datos eran:"''" Lado a=";a'" angulo A=";a2'" C=";c2 1 " INCOGNITAS"''" Angulo A=";a2;" grados"'" Lado b=";b;" unidades de longitud"'" Lado c=";c: 1 " INCOGNITAS"''" Lado c=";c'" Angulo A=";a2'" Angulo B=";b2''" Los Datos eran:"''" Lado a=";a'" b=";b'" Angulo C=";c2;" grados" 1 !Revista de Software VideoSpectrum 1 Verticales 1 JESUS FERNANDEZ 1 Instrucciones 1 IZQUIERDA 1 Horizontales 1 Crucigrama+cursor 1 Casillas negras 1 Cargar caracteres 1 ARRIBA 1 ABAJO 1 D 1 1